home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 15 / BBS in a box XV-2.iso / Files II / Prog / T / TransEdit 3.05.sit / TransEdit v 3.05 / Interface / TransEdit.intf < prev    next >
Encoding:
Text File  |  1994-02-23  |  2.7 KB  |  79 lines  |  [TEXT/PJMM]
  1. { Pascal interface specification for TransEdit }
  2. { for:       TransEdit 3.05 }
  3. { last edit: 23 Feb 94 }
  4.  
  5. {----------------------------------------------------------------------------}
  6. unit TransEdit;
  7. {----------------------------------------------------------------------------}
  8.  
  9. interface
  10.  
  11. {----------------------------------------------------------------------------}
  12.     type
  13. {----------------------------------------------------------------------------}
  14.  
  15. { Procedure types below are all equivalenced to ProcPtr. They're used so }
  16. { that procedure/function specifications will read more similarly to their }
  17. { C counterparts.  The comment preceding each type definition shows how }
  18. { procedures should be written. }
  19.  
  20.         { procedure Key; }
  21.         TEditKeyProcPtr = ProcPtr;
  22.         { procedure Activate (active:Boolean); }
  23.         TEditActivateProcPtr = ProcPtr;
  24.         { procedure Close; }
  25.         TEditCloseProcPtr = ProcPtr;
  26.  
  27. {----------------------------------------------------------------------------}
  28. { Interface routines }
  29. {----------------------------------------------------------------------------}
  30.  
  31.     function NewEWindow (bounds: Rect;
  32.                                     title: Str255;
  33.                                     visible: Boolean;
  34.                                     behind: WindowPtr;
  35.                                     goAway: Boolean;
  36.                                     refCon: LongInt;
  37.                                     bindToFile: Boolean): WindowPtr;
  38.     function GetNewEWindow (resourceNum: Integer;
  39.                                     behind: WindowPtr;
  40.                                     bindToFile: Boolean): WindowPtr;
  41.     function GetEWindowTE (wind: WindowPtr): TEHandle;
  42.     function GetEWindowFile (wind: WindowPtr;
  43.                                     var fileInfo: SFReply): Boolean;
  44.     function IsEWindow (wind: WindowPtr): Boolean;
  45.     function IsEWindowDirty (wind: WindowPtr): Boolean;
  46.     procedure SetEWindowProcs (wind: WindowPtr;
  47.                                     pKey: TEditKeyProcPtr;
  48.                                     pActivate: TEditActivateProcPtr;
  49.                                     pClose: TEditCloseProcPtr);
  50.     procedure SetEWindowStyle (wind: WindowPtr;
  51.                                     font: Integer;
  52.                                     size: Integer;
  53.                                     wrap: Integer;
  54.                                     just: Integer);
  55.     procedure EWindowOverhaul (wind: WindowPtr;
  56.                                     showCaret: Boolean;
  57.                                     recalc: Boolean;
  58.                                     dirty: Boolean);
  59.     procedure SetEWindowCreator (creat: OSType);
  60.     function EWindowSave (wind: WindowPtr): Boolean;
  61.     function EWindowSaveAs (wind: WindowPtr): Boolean;
  62.     function EWindowSaveCopy (wind: WindowPtr): Boolean;
  63.     function EWindowClose (wind: WindowPtr): Boolean;
  64.     function EWindowRevert (wind: WindowPtr): Boolean;
  65.     function ClobberEWindows: Boolean;
  66.     procedure EWindowEditOp (item: Integer);
  67.     function FakeAlert (s1: Str255;
  68.                                     s2: Str255;
  69.                                     s3: Str255;
  70.                                     s4: Str255;
  71.                                     nButtons: Integer;
  72.                                     defButton: Integer;
  73.                                     cancelButton: Integer;
  74.                                     t1: Str255;
  75.                                     t2: Str255;
  76.                                     t3: Str255): Integer;
  77.  
  78. implementation
  79. end.